home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #5 / Amiga Plus CD - 2000 - No. 5.iso / Tools / Dev / GameboyDev / GBDK / lib / scroll_w.s < prev    next >
Text File  |  1999-03-29  |  271b  |  25 lines
  1.     .include    "global.s"
  2.  
  3.     .area    _CODE
  4.  
  5. _scroll_win::
  6.     LDA    HL,2(SP)    ; Skip return address
  7.     XOR    A
  8.     CP    (HL)        ; Is x != 0
  9.     JR    Z,1$
  10.  
  11.     LDH    A,(.WX)        ; Yes
  12.     ADD    (HL)
  13.     LDH    (.WX),A
  14. 1$:
  15.     INC    HL
  16.     XOR    A
  17.     CP    (HL)        ; Is y != 0
  18.     JR    Z,2$
  19.  
  20.     LDH    A,(.WY)        ; Yes
  21.     ADD    (HL)
  22.     LDH    (.WY),A
  23. 2$:
  24.     RET
  25.